home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-03
/
ivb9202.zip
/
FRMPROCE.FRM
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1992-01-16
|
2KB
|
48 lines
frmProcessHelp
Process Help File Text
Form1
Label1
Enter name of file to process:
txtFileProc
Label2
Enter name of index file:
txtFileOut
Label3
Records processed:
txtProgress
cmdProcessFile
ProcessFile
cmdEndProgram
End Program
LastBegin
SearchString
First
LOCATE
cmdProcessFile_Click
txtFileProc1
txtFileOut
FileProcNbr
FileOutNbr
LenSearchText
FileOut
txtProgress
Form_Click
cmdEndProgram_Click
Form_Load
txtFileProc_Change
cmdProcessFile_Click
<Topic
Change this for the marker
in your help fileo
Use to calculate record sizeh
First time through the loop is True
Counter for progress text field
Get a possible help marker
If it's a marker then process
Update progress indicatorc
Can't calculate length
until second record
Reset for next recordl
Write last one out
cmdEndProgram_Click